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ABSTRACT 


This  document  contains  full  information  for  installing 
and  operating  a  progranuAvhich  is  designed  to  translate  the 
FORTRAN  from  the  PLANITxsystem  ^  programs  into  the  TACPOL 
language  for  compilation  on  th^AN&¥K-12-  computer. - 


^PLANIT  is  an  J^nteractive  training  system  which  is  now 
operational  on  the7^<OY!ts^2^,  having  been  Installed  via  the 
program  herein  described.  While  the  normal  method  for 
Installing  the  PLANIT  system  requires  the  existence  of 
a  FORTRAN  compiler  on  the  target  computer,  this  was  circum¬ 
vented  for  the^ANGyK-12  installation  by  developing  the 
Translator  (TRANSL)  program  to  first  translate  the  FORTRAN 
into  TACPOL  for^se  with  the  PSS-B  compiler,  the  only 
compiler  on  the^'AN€r¥K— 12. 


Although  the  installation  of  PLANIT  is  complete  on  the 
^ANGYK-12  computer,  future  updates  of  PLANIT  may  necessitate 
^additional  use  for  the  TRANSL  program. 


BACKGROUND  OF  THE  PLANIT  USER  TRAINING  SYSTEM 
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Several  explicit  user  requirements  converged  to  generate  the 
research  which  resulted  in  the  documents  contained  in  this  set  of  reports. 
The  need  for  some  type  of  user  training  subsystem  in  support  of  tactical 
automatic  data  processing  (ADP)  system  developments  was  clearly  established 
during  the  evolutionary  phase  of  the  Army  Tactical  Operations  System  (TOS) 
development  in  Europe.^  In  1974,  after  a  decade  of  Involvement  in  the 
development  of  tactical  ADP  systems,  the  Army  Computer  Systems  Command 
summarized  this  experience  into  six  "Lessons  Learned. "2  One  of  these 
lessons  was:  A  dedicated  and  trained  user  is  required  if  tactical  ADPS 
is  to  succeed. 

One  approach  toward  meeting  this  requirement  is  to  apply  techniques 
derived  from  modern  educational  technology  and  the  computer  sciences  by 
embedding  training  subsystem  packages  wlttiin  the  operating  system  and 
then  using  the  system  itself  to  teach  the  user  how  to  use  the  system. 

The  approach  was  delineated  in  a  concept  paper, ^  which  was  subsequently 
submitted,  evaluated  and  found  by  key  Army  Personnel  to  have  merit.  As 
a  consequence,  a  requirement  was  placed  on  the  Army's  Behavior  and  Systems 
Research  Laboratory  (BESRL — the  predecessor  of  what  is  now  the  Army 
Research  Institute)  by  what  was  then  the  Assistant  Chief  of  Staff  for 
Force  Development  (ACSFOR)  and  the  Director  of  Army  Research,  Office  of 
the  Chief  of  Research  and  Development  (OCRD),^»^  to  effectuate  the  research 
necessary  to  test  the  concept. 


i-Bakcr,  J.  D.  "Human  Factors  Experimentation  Within  a  Tactical  Operations 
System  (TOS)  Environment."  Proceedings:  Office  of  Naval  Research 
Sponsored  Tri-Service  Coordination  Meeting,  London,  England, 

20-21  February  1968. 

^Memorandum  from  Headquarters,  U.S.  Army  Computer  Systems  Command  to 
Assistant  Deputy  Commander,  CACDA,  Ft.  Leavenworth,  KA;  Deputy  Commander, 
MASSTER,  Fort  Hood,  TX;  Project  Manager,  Army  Tactical  Data  Systems, 

Fort  Monmouth,  NJ,  dtd  30  January  1974,  Subject:  TSDG  Lessons  Learned. 

^Memorandum  from  U.S.  Army  Behavior  and  Systems  Research  Laboratory  to 
Assistant  Chief  of  Staff  for  Force  Development,  dated  28  September  1971, 
Subject:  Proficiency  Maintenance  Using  Computer-Assisted  Instruction  in 
an  Operational  Setting. 

^Memorandum  from  Assistant  Chief  of  Staff  for  Force  Development  to  Chief 
of  Research  and  Development,  dated  10  November  1971;  with  18  November  1971 
Indorsement  to  Behavior  and  Systems  Research  Laboratory,  Subject:  Request 
for  Research  in  Application  of  Tactical  Data  Systems  for  Training. 

^Memorandum  from  Chief  of  Research  and  Development  to  Assistant  Chief  of 
Staff  for  Force  Development,  dated  29  Nov  1971,  Subject:  Request  for 
Research  in  Application  of  Tactical  Data  Systems  for  Training. 
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The  terms  of  the  requirement  actually  levied,  however,  went  well 
beyond  the  scope  of  the  original  concept  and  called  for  a  simultaneous 
attack  on  all  facets  of  the  problem  associated  with  testing  the  feasibility 
of  the  approach.  In  terms  of  broadened  scope,  the  primary  role  of  these 
systems  is  in  support  of  tactical  operations.  Our  original  concept 
paper  suggested  a  potential,  select  secondary  role  for  these  computerized 
tactical  data  systems,  viz. ,  that  of  directly  supporting  the  system  user 
by  using  the  system  itself,  in  a  stand-alone  mode,  to  teach  the  user  how 
to  use  the  system.  The  agencies  structuring  the  research  requirements 
saw  a  possible  tertiary  role  for  these  systems.  About  the  time  they 
were  structuring  their  requirements,  the  Army's  Dynamic  Training  Board 
identified  the  maintenance  of  proficiency  of  Military  Occupation  Specialty 
(MOS)  11B40,  the  light  weapons  Infantryman,  as  a  glaring  unit  training 
problem  and  suggested  that  Computer-Assisted  Instruction  (CAI)  as  one 
teclinique  for  alleviating  the  situation.^  In  addition,  a  subsequent 
Continental  Army  Command  (CONARC)  Task  Group  report  on  CAI  identified 
the  11B40  MOS  as  a  top  contender  for  attention  in  the  "non-technical" 
skills  area.^  Consequently,  the  scope  of  the  effort  was  expanded  to 
encompass  an  examination  of  a  tertiary  role,  l.e.,  in  support  of  the 
system's  parent  unit  by  using  these  computers  to  meet  individual  and 
unit  training  requirements  such  as  those  associated  with  the  11B40  MOS. 
Additionally,  in  response  to  concern  that  the  Implementation  of  the 
Modern  Volunteer  Army  concept  might  produce  a  need  for  general  education 
development  (GED)  upgrading  it  was  determined  that  an  examination  should 
be  made  of  the  feasibility  of  employing  extant  CAI  GED  on  tactical 
computers  in  an  operational  setting.  The  assumption  was  made  that 
accomplishment  of  these  latter  requirements  would  be  tantamount  to 
proving  the  feasibility  of  the  secondary  role  concept  as  well.  The 
test,  therefore,  would  be  a  cost-effective  undertaking  since  it  would 
provide  data  directed  toward  answering  a  number  of  diverse  questions 
concerned  with  a  common  training  delivery  system,  viz. ,  tactical  computers. 

Irrespective  of  whether  it  was  the  secondary  or  tertiary  role 
concept  being  assessed,  four  major  components  were  required:  a  test  in 
a  credible  operational  environment;  appropriate  hardware;  functioning 
software  and  representative  people-ware.  The  vehicle  for  this  overall 
assessment  was  MASSTER®  Test  FM  122,  "IBCS:  Automated  Instruction." 

The  hardware  was  a  "given"  viz. ,  the  Developmental  Tactical  Operations 


^Report  of  the  Board  for  Dynamic  Training,  Volume  II.  17  December  1971, 
page  116. 

^Headquarters,  United  States  Continental  Army  Command  Task  Group  Report 
and  Computer  Assisted  Instruction.  April  1972. 

®MASSTER  -  Modern  Army  Selected  Systems  Test,  Evaluation,  and  Review— 1» 
the  Army's  test  bed  for  assessing  equipment,  concepts  and  doctrine.  This 
activity  is  located  at  Fort  Hood,  Texas. 
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System  (DEVTOS)  which  was  then  located  at  Fort  Hood,  Texas  (Hoyt,  et  al^ 
provide  a  description  of  the  hardware).  Likewise,  the  people  were  a 
"given" — our  student  population  would  be  MOS  11B40  personnel  drawn  from 
the  2nd  Armored  Division  and  1st  Cavalry  Division  located  at  Fort  Hood. 

The  question  of  what  "software"  approach  to  take  (specifically,  whether 
to  use  an  existing  student/author  language)  was  key  to  the  success  or 
failure  of  Test  122.  Clearly,  the  decision  made  at  this  juncture  would 
determine  whcLiicr  we  would  hit  the  assigned  "test  window"  in  time  to 
conduct  the  test.  As  a  related  issue,  courseware  development  would 
largely  depend  upon  the  structure  of  the  student/author  language  selected, 
so  courseware  development  could  not  commence  until  this  decision  was  made. 
The  decision  itself  had  to  be  correct  and  timely — and  whatever  decision 
was  made  would  undoubtedly  be  risky. 

To  add  to  the  difficulty  in  reaching  a  decision,  it  must  be 
realized  that  it  could  not  be  made  unilaterally.  Conduct  of  a  test  of 
the  complexity  of  MASSTER  Test  FM  122  required  support  from  and  coordina¬ 
tion  between  a  number  of  different  agencies — key  among  them  being  mutual 
cooperation  of  the  organization  which  had  DEVTOS  responsibility,  the  U.S. 
Army  Computer  Systems  Command  (USACSC),  and  the  Army  Research  Institute 
(ARI).  A  Memorandum  of  Understanding^^  was  drawn  up  between  these  two 
organizations  and,  as  the  first  USACSC  task  in  this  joint  undertaking,  a 
MASSTER  Tost  122  CAI  Concept  Paper^^  was  to  provide  alternative  concepts 
for  implementing  automated  instruction  materials  on  the  DEVTOS  In  support 
of  MASSTER  Test  122.  Concurrent  with  this  effort,  a  contract  was  let  by 
ARI  with  the  System  Development  Corporation  (SDC)  to  develop  the  course¬ 
ware  (i.e.,  the  instructional  materials  which  would  be  presented  through 
CAI).  The  first  task  SDC  had  to  accomplish  was  to  provide  alternative 
student/author  language  alternatives  for  generating  the  courseware  and 
to  determine  which  alternative  provided  the  best  likelihood  of  success 
under  the  test  conditions  and  time  constraints  Imposed.  In  essence,  the 
combined  results  of  these  analytic  studies  were  expressed  as  follows: 

"At  this  stage,  many  alternative  design  concepts  can  be  formulated. 
However,  due  to  time  constraints  on  the  implementation  of  any  concept, 
the  only  alternative  concept  considered  feasible. .. is  the  use  of  PLANIT." 


^Hoyt,  W.  G.,  Butler,  A.  K.  and  Bennlk,  F.  D.  "Application  of  Tactical 
Data  Systems  for  Training:  DEVTOS  Feasibility  Determination  and  Selection 
of  an  Instructional  Operating  System."  ARI  Technical  Paper  267, 

October  1975. 

^^Memoranduro  of  Understanding  Between  Comnuinder,  U.S.  Army  Research  Institute 
and  Commander,  U.S.  Army  Computer  Systems  Command,  Dated  5  June  1973. 

^^Bunker-Ramo  Technical  Note  "MASSTER  Test  122 — Computer  Assisted  Instruction 
(CAI)  Concept  Paper,"  February  1975,  prepared  for  the  U.S.  Army  Computer 
Systems  Command. 

^^Ibld.  11,  page  18. 
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PIJ^NIT  (I^roBramming  LanRunRC  for  Interactive  Teaching)  is  an 
instructional  system  consisting  of  an  author  language  and  supporting 
computer  programs  for  preparing,  editing  and  presenting  any  subject 
matter  suitable  for  individualized  CAT  presentation  to  students,  as  well 
as  recording  all  relevant  response  data  for  immediate  utilization  and 
subsequent  analyses.  PIJVNIT  was  developed  over  an  cloven  year  period 
under  the  aegis  of  the  National  Science  Foundation  (NSF)  at  a  total 
investment  cost  of  approximately  $740,000.  Tlie  main  goal  of  this  NSF 
project  was  to  produce  a  student/author  language  which  would  be  fully 
transportable  and  guaranteed  compatible  with  a  large  and  diversified 
class  of  machines. J 3  wq  at  ARI  take  professional  pride  in  the  fact  that 
it  was  our  early  and  subsequent  work  with  PLANIT  which  validated  this 
visionary  transportability  notion  of  NSF.^^^  We  also  take  "economic" 
pride  in  the  fact  tliat  we  capitalized  upon  an  already  "hefty"  U.S. 

Government  investment  to  solve  a  problem,  rather  than  slipping  into  the 
classic  mold  of  "reinventing  the  wheel"  by  starting  from  scratch  and 
building  a  separate  student/author  language  tailored  to  the  hardwarc/sof tware 
system  constraints. 

To  lower  the  curtain  on  MASSTER  Test  FM  122,  the  test  was  success¬ 
fully  conducted  and  demonstrated  that  it  was  feasible  to  use  tactical 
computers  in  a  stand-alone  training  mode  to  satisfy  Individual  and  unit 
training  requirements.  It  was  found  that  automated  instruction  in  a 
field  setting  was  enthusiastically  accepted  by  the  non-commissioned 
officers  (NCO's)  examined  and,  as  a  training  medium,  it  proved  to  be 
more  effective  than  the  traditional  study-method  of  training. 


^^Fryc,  C.  H.  "A  Report  on  PLANIT:  One  Stage  of  Completion,"  Final  Report 
for  the  National  Science  Foundation  Grant  No.  EPP73-07319  A04,  August  1975. 

^^For  a  complete  account  of  the  experiences  of  ARI  in  installing,  using  and 
evaluating  PIANIT  in  an  Army  setting,  including  all  the  "warts  and  blemishes" 
uncovered  during  this  endeavor,  see:  Johnson,  C.  "Implementation  of  PLANIT 
at  tlie  U.S.  Army  Research  Institute  for  the  Behavioral  and  Social  Sciences," 
PLANIT  Newsletter,  July  1975. 

^^Hoyt,  W.  G.  and  Baker,  J.  D.  The  use  of  tactical  computers  to  provide 
weapons  and  tactics  training  to  combat  NCO's:  Results  of  a  field  test. 
Proceedings:  Sixtcentli  Annual  Conference  of  the  Military  Testing 

Association  MTA,  U.S.  Coast  Guard  Institute,  Oklahoma  City,  OK. 

21-25  October  1974. 

^^Hoyt,  W.  G.,  Butler,  A.  K.  and  Bcnnik,  F.  D.  Application  of  tactical 
data  systems  for  training:  Volume  II  -  CAI/DEVTOS  automation  studies. 

ARI  Technical  Paper  267,  October  1975. 

^^Hoyt,  W.  G.,  Butler,  A.  K.  and  Bennik,  F.  D.  Application  of  tactical 
data  systems  for  training:  Volume  I  -  Executive  Summary.  ARI  Technical 
Paper _ ,  in  preparation. 


vi 


But  the  results  of  this  test  proved  more  than  the  preceding.  They 
also  indicated  that  the  obvious  Army  needs  mentioned  at  the  outset  of 
this  preface,  could  be  met  by  applying  this  technology  to  a  real  and 
present  problem.  It  also  went  beyond  the  exploratory  stage  and  satisfied 
a  spcriflc  Army  requirement.  The  U.S.  Army  Combat  Developments  Command 
(CDC)/Systcms  Analysis  Group  (now  the  U.S.  Army  Training  and  Doctrine 
Command /Combined  Arms  Combat  Developments  Activity,  or  TRADOC/CACDA)  had 
levied  the  following  requirement^O  on  ARl: 

The  Proposed  Material  Need  for  the  Tactical  Operations 
System  -  TOS  (Unclassified  title,  portions  of  contents 
classified  CONFIDENTIAL)  states:  "During  system  non- 
tactlcal  employment  the  equipment  shall  have  the 
capability  to  permit  the  training  of  user  personnel 
without  affecting  the  mission  ready  capability  of  the 
system."  Wlille  the  need  exists,  no  specific  data  are 
extant  which  can  be  brought  to  bear  on  this  problem. 

Tlie  requested  research  will  provide  data  whlcli  could 
Impact  on  all  TOS  users  and  result  in  considerable 
savings  in  training  costs  related  to  the  user's 
need  to  maintain  proficiency  in  the  use  of  these 
systems. 

The  122  Test  data  satisfied  the  CDC  requirement.  The  Proposed  Material 
Need  (MN)  for  TOS  was  found  to  be  a  viable  concept  and  that  MM  remains 
to  this  day  as  a  bonafide  component  of  the  TOS  program. 

As  previously  discussed,  the  results  from  MASSTER  Test  FM  122 
demonstrated  the  viability  of  the  embedded  training  subsystem  concept  in 
general  and  that  tactieal  data  systems  could  be  used  in  a  tertiary  role, 
i.e.,  specifically,  that  these  systems  could  be  used  in  a  stand-alone 
mode  in  support  of  individual  and  unit  softskills  training  requirements. 
But  conceptually  our  main  goal  had  always  been  to  embed  system  specific 
training  packages  within  the  operating  system  Itself  and  then  to  use  the 
system  to  teach  the  user  how  to  use  the  system — the  earlier  noted 
secondary  role  for  these  systems. 


^®Hoyt,  W.  G. ,  Butler,  A.  K.  and  Bennlk,  F.  D.  Application  of  tactical 
data  systems  for  training:  Volume  III  -  Development  of  courseware  and 
analysis  of  results  for  MOS  11B40.  ARI  Technical  Paper  _ ,  in  preparation. 

^^Hoyt,  E.  G.,  Butler,  A.  K.  and  Bennik,  F.  D.  Application  of  tactical  data 
systems  for  training:  Volume  IV  -  Development  of  courseware  and  analysis 
of  results  for  GED  math.  ARI  Technical  Paper  _ ,  in  preparation. 

^^Letter,  DARB-ARB  19  July  1972,  Subject:  New  Research  Requirements  for 
the  Human  Resources  Research  and  Development  Program  (RCS  CSCRD  70  CRI); 
letter  response  from  CDCSAG-AGl,  same  subject  as  above,  dated 
1  September  1972. 
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As  a  follow-on  to  Test  122,  research  was  initiated  under  the  aegis 
of  the  Product  Manager,  Computer  Training  Systems  (PM  CTS)  through 
URN  75-158  (and,  subsequently,  HRN  76-195)  which  tasked  ART  to  address 
the  problem  of  reducing  the  novice  user's  difficulties  by  making  tactical 
data  systems  (e.g.,  TOS^,  TACFIRE,  TSQ-73,  etc.)  more  ’’approachable" 
through  applications  of  the  embedded  training  concept. 

Because  of  its  stage  of  development,  the  fact  that  its  basic  central 
processing  unit  would  serve  as  the  core  for  other  Army  Tactical  Data 
Systems  (ARTADS)  to  follow,  and  the  fact  that  its  operator  training 
problems  appeared  to  be  amenable  to  reduction  through  the  application  of 
automated  instructional  technology,  TACFTRE  (the  Army's  field  artillery 
tactical  fire  control  system)  was  chosen  by  the  PM  CTS  as  the  test 
vehicle  for  assessing  the  embedded  training  subsystems  concept.  The 
initial  and  specific  requirements  for  the  TACFIRE  research  were  delineated 
in  HRN  76-193,  "Development  and  Evaluation  of  PLANIT  Based  Computer 
Embedded  Training  Packages  for  TACFIRE"  which  was  prepared  by  personnel 
of  the  U.S.  Army  Field  Artillery  School,  Fort  Sill,  OK. 

Once  again  we  were  fared  with  the  dilemma  as  to  whether  the  best 
decision  would  be  to  develop  a  tailor-made  student/author  language 
smoothly  fitted  to  the  hardware/software  constraints  of  the  TACFIRE 
system,  or  to  build  upon  our  already  successfully  operat ing  PLANIT 
system  and  attempt  to  Install  it  on  TACFIRE.  The  latter  approach  had 
many  merits,  among  them:  (1)  it  was  an  author  language  system  with 
which  we  were  familiar,  while  a  customized  system  would  be  untested, 
costly  and  would  require  an  extensive  checkout;  (2)  a  customized  author¬ 
ing  system  would  be  limited  to  a  given  TACFIRE  configuration,  whereas 
PLANIT  would  be  transportable  to  the  family  of  ARTADS  systems,  and  (3) 
because  of  PLANIT' s  machine  Independent  characteristics,  courseware 
could  bo  prepared  on  commercial  computers  and,  after  content  checkout, 
easily  installed  on  the  tactical  system,  whereas  a  customized  approach 
would  tie-up  the  actual  tactical  system  during  courseware  preparation. 

Tlie  effort  to  install  PLANIT  on  the  AN/GYK-12  computer,  the  results 
of  which  are  contained  in  this  set  of  reports,  was  independently  under¬ 
taken  as  Technology  Based  -  Exploratory  Development  research  and  not 
as  Advanced  Development  activity  (l.e.,  it  was  not  done  in  direct  response 
to  an  explicit,  stated  user  need).  It  serves  as  a  classic  example  of 
what  Dr.  Malcolm  R.  Currie,  Director  of  Defense  Research  and  Engineering 
(DDR&E)  was  describing  in  the  following  statement  to  the  Second  Session 
of  the  94th  Congress:  "The  objective  of  the  Technology  Base  is  the 
advancement  of  technology  applicable  to  future  systems  and  subsystem 


^^Huraan  Resource  Need  (HRN)  75-158,  title:  "User  Training  and  Proficiency 
Maintenance  In  a  Tactical  Data  Systems  Environment,"  submitted  as  a 
research  requirement  for  Inclusion  In  the  ARI  FY  75  Advanced  Development 
Work  Program  by  the  Product  Manager,  Computerized  Training  System, 

Fort  Monmouth,  NJ.  HRN  76-195  was  a  revalidation  of  the  requirements 
delineated  in  75-158  for  Inclusion  In  the  FY  76  Work  Program. 
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options.  Tlicse  options  (or  new  ideas)  usually  involve  enhanced  military 
capability,  reduced  cost,  increased  performance,  better  reliability  and 
maintainability,  more  efficient  use  of  resources  or  some  combination  of 
these  attributes."  Success  in  this  effort  would  produce  a  broadly 
applicable,  cost-effective  vehicle  for  employing  embedded  training  sub¬ 
system  packages  in  a  variety  of  military  system  settings. 

It  merits  comment,  however,  that  while  this  work  was  a  Technology 
Based-Exploratory  Effort,  it  had  the  potential  for  feeding  into  the 
Advanced  Development  program  efforts  associated  with  the  user  tasks 
presented  In  HRN  75-158,  "User  Training  and  Proficiency  Maintenance  in  a 
Tactical  Data  Systems  Environment,"  if  the  outcome  were  successful. 
Consequently,  the  PM-CTS  was  appraised  of  this  effort  at  the  outset  and 
he,  in  turn,  coordinated  it  with  the  Program  Manager,  Army  Tactical  Data 
Systems  (PM  ARTADS).  During  this  coordination  some  valid  points  of 
criticism  were  raised^^  concerning  the  PLANIT  approach.  The  PM  ARTADS 
recommended  that  ARl  meet  with  system  developers,  users  and  training 
agencies  as  soon  as  sufficient  data  were  available  to  determine  whether, 
or  not,  PLANIT  would  operate  on  TACFIRE.  At  that  time  a  determination 
would  be  made  concerning  implementation  implications  and  to  assess  if, 
indeed,  this  were  the  most  effective  approach  to  take,  given  the  potential 
for  Impact  on  TACFIRE  system  development  efforts.  In  keeping  with  this 
recommendation,  a  Workshop  was  convened  at  ARI  in  Arlington,  VA  on 
1  October  197A  and  these  items  were  covered  in  detail  with  personnel 
from  all  of  the  suggested  groups  in  attendance.  The  interaction  was 
found  to  be  most  beneficial  to  all  concerned  and  the  concensus  of  the 
group  was  to  Install  the  system  described  in  this  set  of  reports  on  the 
TACFIRE  system  at  Fort  Sill,  OK,  and  to  use  it  as  the  test  vehicle  for 
assessing  the  embedded  training  concept  on  that  ARTADS  system. 

This  historic  overview  of  the  events  leading  up  to  the  production 
of  the  set  of  quite  specialized  reports  may  seem  untoward  in  view  of  the 
projected,  limited  set  of  users  of  tliesc  documents.  It  is,  however,  a 
quite  meaningful  foruit^  for  discussing  these  events.  Too  frequently  the 
question  is  raised  as  to  how  did  a  particular  research  product  originate 
and  was  it  utilized.  Tlie  intent  here  is  to  show  that  tlic  warp  and  woof 
of  concepts  and  coordination,  requirements  and  research  are  so  intertwined 
that  a  simple  one-to-one  relationship  (one  response,  one  use)  does  not 
tell  the  story — only  a  view  of  the  whole  cloth  will  put  it  into  proper 
perspective.  Additionally,  it  exemplifies  a  point  made  in  the  previously 
cited  presentation  by  the  Director  of  Defense  Research  and  Engineering 
to  the  9Ath  Congress  when  he  said:  "To  deploy  systems  DOD  must  not  only 
pursue  advanced  technology  but  must  endure  the  long  years  of  research 
required  to  bring  an  idea  through  growth  problems  to  a  finished,  proven 
and  useful  end  product." 


^^Memorandum  from  Product  Manager,  Computer  Training  Systems  (PM-CTS)  to 
Program  Manager,  Army  Tactical  Data  Systems  (^^t-ARTADS)  28  Jan  74, 
Subject:  HRN  75-158  and  1st  indorsement  from  PM-ARTADS  to  PM-CTS,  same 
subject  as  above  dated  7  February  74. 
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This  set  of  reports  provides  detailed  Instructions  for  implementation 
and  operation  of  PLAMiT  and  auxiliary  programs  on  the  AN/GYK-i2  computer. 

The  set  consists  of  a  report  on: 

TRANSL  The  PLANIT  Translator  Program:  Installation  and  Application 

PLANIT  Support  Programs  -  Operator/user  manual 

PLANIT  Utility  Program  -  Operator/user  manual 

PLANIT  Support  and  Utility  Programs  -  Test  Procedure 

PLANIT  Support  and  Utility  Programs  -  Flow  Charts. 

The  first  report  contains  the  information  for  installing  and  operating  a 
program  which  is  designed  to  translate  the  FORTRAN  from  the  PLANIT 
system  of  programs  into  the  TACPOL  language  for  compilation  on  the 
AN/GYK-12  computer.  The  second  covers  the  general  and  specific  aspects 
of  leading  and  operating  PLANIT  on  the  AN/GYK-12  computer.  The  third 
document  covers  the  general  and  specific  aspects  of  operating  the  PLANIT 
utility  programs  which  are  a  specialized  group  of  routines  developed  to 
accomplish  various  tasks  in  support  of  the  AN/GYK-12  computer  installation 
of  PLANIT.  The  fourth  report  covers  the  procedures  used  to  verify  that 
PLANIT  Support  and  Utility  Programs  are  functioning  as  per  specifications. 

The  fifth  document  provides  the  detailed  flow  charts  of  the  computer 
logic  cf  the  PLANIT  Support  and  Utility  Programs. 

The  effort  detailed  in  the  first  report  (i.e.,  TRANSL)  was  accomplished 
under  ARI  Contract  DAHC19”7^-C-0038  by  the  Northwest  Regional  Educational 
Laboratory,  Portland,  Oregon.  The  other  four  reports  in  the  series  were 
prepared  by  the  Data  Systems  Division,  Litton  Systems  Inc.,  Van  Nuys,  CA 
under  ARI  Contract  No.  DAHC19“7^ -C-00^ . 
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TRANSL 


THE  PLAN  IT  TRANSLATOR  PROGRAM 


INSTALLATION  AND  APPLICATION 


INTRODUCTION 

Soon  after  computers  began  to  be  used  through  time- 
shared,  interactive  typewriter  terminals,  experimental 
efforts  were  initiated  to  use  this  new  facility  for  training 
purposes.  Within  a  few  years  several  systems  were  developed 
which  made  the  computer  more  readily  adaptable  for  this  use. 
PLANIT  (Programming  Language  for  Interactive  Teaching)  Is 
one  such  system.  The  user  features  and  Intended  applicat¬ 
ions  of  PLANIT  are  documented  elsewhere  and  will  not  be 
elaborated  here.  What  Is  important  is  the  fact  that, 
unlike  other  such  systems,  PLANIT  is  a  complete  and  fully 
portable  time-sharing  system  suited  particularly  to  train¬ 
ing  applications.  These  features  have  contributed  to  the 
selection  of  PLANIT  for  installation  on  a  variety  of  mili¬ 
tary  computers,  some  of  which  have  non-standard  features 
and  lack  the  usual  software  support  on  which  some  inter¬ 
active  systems  depend. 

One  such  specialized  military  computer  is  the  ANGYK-12 
(or  the  Litton  designation,  L3050)  which  is  designed  to  be 
used  in  several  tactical  systems  applications  such  as  the 
TACFIRE  fire  control  system.  Although  the  ANGyK-12  is  a 
versatile  and  sophisticated  computer,  it  lacks  many  of  the 
facilities  which  one  would  expect  to  find  on  a  commercial 
computer  of  comparable  size.  Instead  of  the  usual  menu  of 
programming  languages.  It  has  only  TACPOL  (a  PL-1  like 
language) .  The  TACPOL  language  was  designed  especially  for 
this  computer.  Although  the  similarities  to  conventional 
programming  languages  are  many,  there  are  some  important 
differences  such  as  the  lack  of  any  floating  point  numerical 
operations. 

Because  of  the  above  considerations,  PLANIT  was  found 
to  be  the  only  available  training  system  which  could  be 
installed  on  the  ANGYK-12  computer  without  extensive  re¬ 
development  efforts.  However,  PLANIT  normally  makes  use  of 
the  FORTRAN  IV  language  in  the  installation  process  to 
achieve  its  portability.  Since  FORTRAN  IV  was  not  avail¬ 
able  on  the  ANGYK-12,  a  special  translator  program  was 
written  which  intercepts  the  FORTRAN  statements  in  the 
usual  PLANIT  installation  process  and  converts  them  to 
equivalent  TACPOL  statements. 


2 


It  should  be  noted  that  the  term,  FORTH  AN- to-TACPOL 
Translator  is  not  being  used  because  that  has  the  connota¬ 
tion  of  a  much  more  general  program  than  the  one  needed 
for  this  particular  task.  Called  TRANSL,  this  translator 
program  is  designed  explicitly  to  translate  the  programs 
associated  with  the  PLANIT  system  and  particularly  the 
PLANIT  system  FORTRAN  statements. 

Portability  of  the  PLANIT  system  was  achieved  by 
writing  the  system  code  in  a  unique,  machine-independent 
higher  level  language.  Although  this  language  bears  some 
similarity  to  FORTRAN,  it  is  necessary  that  each  of  the 
several  thousand  statements  be  preprocessed  by  a  system 
generation  program  before  the  result  is  submitted  to  a 
FORTRAN  compiler.  In  system  generation,  machine  and 
configuration  parameters  are  introduced  into  the  code  in 
such  a  way  that  the  resulting  FORTRAN  statements  will  then 
be  suitable  for  the  intended  machine.  Therefore  TRANSL 
will  only  be  translating  FORTRAN  statements  of  the  type 
that  the  PLANIT  system  generator  produces.  This  reduces 
the  magnitude  of  the  translation  task  significantly  and 
makes  possible  the  guarantee  of  100%  success  in  the  trans¬ 
lation  of  these  FORTRAN  statements  into  TACPOL. 

The  PLANIT  System  Generator  program  is  written  in 
the  FORTRAN  IV  language  in  such  a  way  that  it,  too,  can 
be  Installed  easily  anywhere  that  a  FORTRAN  IV  compiler 
exists.  Because  of  adherence  to  strict  programming  stand¬ 
ards,  the  Generator  can  also  be  translated  into  TACPOL  by 
using  the  TRANSL  program.  Expected  translation  failures 
will  occur  in  four  types  of  statements:  READ,  WRITE,  FORMAT 
and  END  FILE.  These  statements  are  few  and  are  conveniently 
clustered  at  the  beginning  of  the  program  for  ease  in 
changing  by  hand. 

The  installation  process  for  PLANIT  and  the  PLANIT 
System  Generator  is  documented  in  detail  elsewhere. 

Figure  1  shows  the  general  sequence  to  be  followed  in 
the  normal  installation  of  PLANIT.  Note  that  the  produc¬ 
tion  of  FORTRAN  is  simply  an  intermediate  step  in  the 
installation  process  and  has  no  further  function  after  the 
program  has  been  compiled.  By  the  time  PLANIT  is  running, 
all  connections  to  FORTRAN  are  gone.  Figure  2  shows  the 
TACPOL  translation  to  be  simply  an  inserted  step  in  the 
installation  sequence.  Note  that  there  is  no  change  at 
the  top,  l.e.  the  manner  in  which  the  system  generation  is 
done.  Also  note  that,  like  FORTRAN,  all  connections  to 
TACPOL  disappear  when  PLANIT  is  ready  to  run.  Note,  too, 
that  both  installation  methods  require  the  writing  of  a 
similar  locally  designed  interface  program  (MIOP) .  There¬ 
fore,  the  use  of  the  TRANSL  program  is  Just  another  step 
in  the  same  general  process. 


PLANIT  INSTALLATION  PROCESS 


MACHINE 

PARAMETERS 


PLANIT 

SOURCE  CODE 


CONFIGURATION 

PARAMETERS 


Figure  1.  A  typical  sequence  of  steps  for  installing  the 
PLANIT  system  on  a  commercial  computer.  The  three  top 
files  plus  the  PLANIT  Generator  are  furnished.  Installers 
modify  the  parameters  to  fit  local  needs  prior  to  system 
generation.  A  local  FORTRAN  IV  compiler  is  required. 
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PLANIT  INSTALLATION  PROCESS 


MACHINE  PtANIT  CONE  IGURAT  ION 

PARAMETERS  SOURCE  CODE  PARAMETERS 


PROOUCES  PORTRAN 


PIANII  TRANSLATOR 


PRODUCES  TACPOt 


TACPOL  COMPtlER 


FINISHED  PLANIT  SYSTEM 


Figure  2.  The  sequence  of  steps  for  installing  PLANIT  on  the 
ANGYK-12  computer.  The  three  top  files  plus  the  PLANIT 
Generator  and  the  PLANIT  Translator  are  furnished.  Para¬ 
meters  have  already  been  set  appropriately.  A  local  TACPOL 
compiler  is  required. 
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Finally,  for  convenience,  TRANSL  was  coded  in  FORTRAN 
IV  according  to  the  same  standards  which  were  followed  in 
the  coding  of  the  PLANIT  System  Generator  program.  This 
makes  the  TRANSL  program,  like  the  Generator  program, 
completely  portable  even  though  it  was  written  specifically 
for  the  ANGYK-12  implementation  of  PLANIT.  The  coding  of 
TRANSL  in  this  fashion  has  two  advantages:  1)  it  could  be 
modified  for  use  in  another  specialized  application  at  a 
considerable  saving,  and  2)  the  procedures  for  installing 
and  running  TRANSL  are  pearly  identical  to  those  for 
the  Generator.  Thus,  for  the  reader  who  is  already  familiar 
with  procedures  for  Installing  the  PLANIT  System  Generator, 
the  only  differences  will  be  that  TRANSL  uses  only  one 
input  file  Instead  of  two  and  writes  to  one  output  file 
but  not  to  the  line  printer  (as  does  the  Generator  program) . 
Otherwise,  the  commented  section  in  the  listing  of  TRANSL 
which  describes  the  few  changes  which  may  be  necessary  is 
very  similar  to  the  Generator  and  the  requirements  for  the 
LDBYTE  and  SBYTE  subroutines  are  identical  for  both  programs 
(as  well  as  for  PLANIT  itself).  Thus  TRANSL  can  be  used 
to  translate  Itself  into  TACPOL  if  such  a  version  is 
desirable. 
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INSTALLATION  OF  TRANSL 

The  TRANSL  program  will  require  one  input  file  and 
one  output  file.  Both  files  will  be  80-column  card  Images 
on  disk,  tape,  or  whichever  physical  device  is  desired. 

The  device  assignment  is  made  in  the  usual  FORTRAN  manner. 
The  input  file  is  assigned  the  FORTRAN  logical  file  number 
one  and  the  output  file,  number  two.  These  assignments  are 
made  in  a  FORTRAN  READ  and  WRITE  statement,  respectively, 
near  the  top  of  the  program.  There  Is  only  one  of  each. 

The  input  file  will  contain  card  images  of  FORTRAN 
statements  and  the  output  file  will  contain  the  equiva¬ 
lent  TACPOL  statements.  Diagnostics,  if  any,  will  be 
inserted  appropriately  in  the  output  file  and  a  count  of 
such  diagnostics  (if  greater  than  zero)  will  be  added  to 
the  end  of  the  file.  The  content  and  format  of  the  diag¬ 
nostics  will  be  discussed  later  but  the  user  will  probably 
want  to  plan  on  obtaining  a  listing  of  the  output  file 
before  going  to  the  next  step  during  actual  Installation. 

The  TRANSL  program  listing  begins  with  several  lines 
of  comments  which  summarize  the  information  presented  here. 
Especially  important  in  these  comments  are  the  few  lines 
enclosed  between  two  rows  of  asterisks  (******),  Between 
these  lines  are  grouped  all  of  the  FORTRAN  statements 
which  should  normally  be  examined  during  the  Installation 
of  the  TRANSL  program. 

The  first  statement  to  be  considered  is  "IBYTE=4".  , 
This  statement  signifies  that  there  are  four  bytes  (char¬ 
acters)  to  the  computer  word  in  the  design  of  the  machine 
on  which  this  program  is  being  run.  That  number  is 
correct  for  the  ANGYK-12  computer  as  well  as  for  many 
others.  If  it  is  incorrect  it  must  be  changed. 

If  there  is  a  need  to  open  either  of  the  files,  that 
should  be  done  just  before  or  just  after  the  IBYTE-4 
statement . 

The  "END  FILE  2"  statement  causes  the  writing  of 
the  cnd-of-flle  mark  on  the  output  file  and  it  is  closed. 
This  statement  may  need  changing  to  conform  to  local 
requirements.  File  1  may  also  be  closed  at  this  point  if 
necessary. 

The  READ  and  WRITE  statements  are  the  last  to  be 
checked  in  this  section.  The  card  image  is  passed  through 
a  common  buffer,  INBUFF.  Both  the  READ  and  WRITE  statements 
operate  with  implicit  DO-loops  to  specify  exactly  one  card 
of  80  columns  at  a  time.  The  FORMAT  card  at  label  1000 
(above)  must  agree  with  the  READ  and  WRITE  statements 
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such  that  exactly  one  card  image  will  be  read  (or  written) 
at  a  time. 

In  rare  instances  a  FORTRAN  compiler  may  require  the 
dimension  of  INBUFF  to  exactly  fit  one  card.  If  so,  then 
the  dimension  of  the  array  INQUE  must  also  be  ad,justed  to 
the  new  number  and  a  statement  below  the  asterisk  line  which 
now  reads  "IBFDIM°=30''  must  be  changed  so  that  the  new 
dimension  number  replaces  the  30.  With  these  changes,  the 
implicit  DO-loops  could  also  be  eliminated  if  the  compiler 
objects  to  them. 

In  summary,  the  changes  to  be  expected  are  in  statements 
which  are  located  between  the  two  lines  of  asterisks,  and 
these  changes  will  probably  be  limited  to  the  two  statements, 
"IBYTE-4"  and  "1000  P0RMAT(20A4) "  where  the  number  of  bytes 
per  computer  word  differ  from  four.  If  the  bytes  per  word 
equal  four,  the  Translator  program  should  run  Just  as  it  is. 

The  final  installation  requirement  of  the  TRANSL 
program  is  the  writing  of  the  LDBYTE  and  SBYTE  subroutines. 
These  two  subroutines  are  called  throughout  TRANSL  as  well 
as  throughout  the  Generator  and  PLANIT.  The  calls  are  the 
same  in  all  cases— "CALL  LDBYTE"  or  "CALL  SBYTE"— with  no 
argument  string  in  the  calling  sequence.  The  parameters 
for  doing  the  prescribed  work  are  taken  from  C^inK)N  in  the 
manner  described  below.  Note  that  the  description  will  be 
the  same  for  these  subroutines  used  by  the  Generator  and 
PLANIT. 

Subroutines  LDBYTE  and  SBYTE  both  use  the  same  set  of 
three  parameters,  called  IBYTl,  IBYT2  and  INDEX.  The  first 
entry  in  COMMON  shows  the  locations  of  the  three  parameters. 
Suppose  an  array,  10,  was  equivalenced  to  COMMON.  Then 
I0(I0(l)-3)  would  be  the  same  as  IBYTl,  I0(I0(l)-2)  would 
be  the  same  as  IBYT2,  and  I0(I0(1)-1)  as  INDEX.  In  other 
words,  the  first  entry  in  COMMON  contains  the  "index"  of 
the  COMMON  location  Just  beyond  INDEX.  Thus,  LDBYTE  and 
SBYTE  must  use  >Vbe  same  COMMON  as  TRANSL,  and  the  first 
entry  in  COMMON  Kill  locate  the  three  parameters. 

The  Interpretation  of  each  of  the  three  parameters 
is  as  follows: 

IBYTl  -  The  byte  number  of  the  first  character  in 
a  string  of  contiguously  packed  characters 
in  COMMON. 

IBYT2  -  The  byte  number  of  the  last  character  in  the 
string  described  above. 

INDEX  -*  The  COMMON  "index"  number  to  which  (or  from 

which)  the  characters  will  be  unpacked  (packed) 
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Figure  3  illustrates  the  operation  of  LIffiYTE  and  SBYTE 
'vith  the  byte  numbering  and  indexing  scheme.  The  bytes 
(character  positions)  in  COMMON  assume  sequential  numbers 
such  that  if  COMMON  was  completely  filled  with  one  long 
string  of  characters  tightly  packed  with  no  gaps,  then 
the  first  character  would  be  In  position  one  (leftmost 
byte  of  the  first  word  in  COMMON)  and  the  numbers  would 
increase  sequentially  throughout  COMMON.  The  index,  on 
the  other  hand,  refers  to  the  word  number  of  '(X)MMON  where 
the  first  word  has  the  number  one  assigned  to  it.  If 
COMMON  was  treated  as  one  long  array  where  each  word  was 
an  entry  In  the  array,  then  the  index  would  be  equivalent 
to  the  entry  number,  beginning  at  one. 

The  subroutine  LIffiYTE  is  to  unpack  characters  beginning 
at  byte  number  IBYTl  through  byte  number  IBYT2,  placing  a 
copy  of  the  unpacked  characters,  one  byte  per  word,  back 
Into  (X)MMON  beginning  at  INDEX.  The  unpacked  characters 
are  to  be  right-justified  in  the  word  with  leading  binary 
zeros.  The  only  COMMON  locations  which  are  to  be  changed 
(including  the  parameters  themselves)  are  the  words  which 
receive  the  unpacked  characters. 

The  subroutine  SBYTE  does  the  reverse  operation  from 
LDBYTE.  It  must  make  a  string  of  the  rightmost  character 
of  each  successive  word  entry  beginning  at  INDEX  and 
pack  that  string  into  (X)MMON  beginning  at  IBYTl  byte 
position  and  ending  at  IBYT2  byte  position  without  chang¬ 
ing  byte  locations  on  either  end  of  the  newly  packed 
string  or  elsewhere  in  COMMON. 

Figure  3  assumes  a  computer  with  four  bytes  per  word 
and  shows  an  example  where: 

IBYTl- 22 

IBYT2-27 

INDEX-41 

The  repositioning  of  the  copied  characters  which  each 
subroutine  must  perform  is  indicated  by  the  arrows. 

The  LIBYTE  and  SBYTE  subroutines  may  be  written  in 
any  form  that  is  most  convenient  on  the  target  computer. 
However,  if  the  same  ones  are  to  be  used  for  PLANIT,  then 
care  should  be  taken  to  insure  fast  and  efficient  operation. 
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LDBYTE  SBYTE 


Figure  3.  Example  of  the  operations  of  LDBYTE  and  SBYTE,  both 
using  the  same  parameter  sequence:  22,  27,  and  41.  Byte  numbers 
are  shown  in  the  upper  right-band  comer  of  each  cell.  One  asterisk 
{*)  signifies  that  the  previous  value  is  unchanged,  two  asterisks  {**) 
designate  binary  zero  (not  necessarily  the  character  code  for  zero), 
and  three  asterisks  («**)  designate  values  which  have  no  effect  what¬ 
ever  on  the  operation. 


10 


APPLICATION  OF  TRANSL 

The  TRANSL  program  accepts  FORTRAN  IV  statements,  one 
at  a  time,  and  produces  TACPOL  statements  as  required. 

The  TACPOL  is  suitable  for  the  PSS-B  compiler. 

The  TRANSL  program  actually  performs  two  separate 
translation  tasks.  Each  task  is  run  as  a  one-pass  Job. 

In  the  first  task,  TRANSL  translates  only  the  FORTRAN 
code  statements,  passing  over  the  FORTRAN  COMMON  state¬ 
ments  after  noting  them  for  proper  placement.  Other 
than  for  COMMON  statements,  this  task  produces  one  or 
more  TACPOL  statements  for  each  FORTRAN  statement. 

Continued  FORTRAN  statements  are  assembled  into  s  single 
line  before  translation,  and  excessively  long  TACPOL 
results  are  broken  into  as  many  continued  lines  as  are 
necessary  as  a  last  step  in  the  translation  process. 

A  few  FORTRAN  statements  (including  arithmetic  IF,  CALL 
LDBYTE,  CALL  SBYTE,  and  CALL  MIOP)  result  in  more  than 
one  output  line  for  the  one  FORTRAN  input  line.  If  the 
translation  attempt  fails,  the  original  FORTRAN  line  is 
copied  to  the  output  file  followed  by  a  full  line  of 
slashes  (l.e.  //////////).  The  slashes  are  added  as  an 
aid  to  finding  the  faulty  line  in  the  listing.  No  further 
explanation  is  given  of  the  failure.  The  problem  must  either 
be  in  one  of  the  documented  types  of  FORTRAN  statements  that 
will  not  translate  (i.e.  READ,  WRITE,  FORMAT,  END  FILE)  or 
the  occurrence  of  incorrect  FORTRAN  or  that  which  does  not 
conform  to  PLANIT  standards.  An  error  of  the  latter  type 
might  be  expected  to  occur  if  TRANSL  is  used  to  translate 
a  roRTRAN  program  which  is  not  part  of  the  PLANIT  package. 

The  second  task  which  TRANSL  is  designed  to  perform 
is  the  creation  of  TACPOL  declare  (DCL)  statements  which 
will  be  used  by  the  Compool  Generator.  These  two  tasks 
are  separate  because  a  new  Compool  generation  will  not 
be  needed  for  every  new  translation;  only  for  the  first 
one  and  each  thereafter  where  any  data  declarations  change. 

In  performing  the  second  task,  the  TRANSL  program  must 
scan  all  of  the  FORTRAN  code  for  each  Initial  reference 
to  an  item  name,  and  construct  a  TACPOL  data  declaration 
statement  for  that  name.  The  names  nay  be  found  in  COMMON 
statements  or  in  the  program  statements  since  FORTRAN  does 
not  require  declaration  of  simple  item  names  prior  to  their 
use.  However,  TRANSL  will  not  find  the  needed  information 
in  FORTRAN  DIMENSION  or  EQUIVALENCE  statements  since  those 
are  not  used  in  PLANIT  coding. 

In  respect  to  this  second  task,  the  production  of 
the  DCL  statements,  the  FORTRAN  from  the  PLANIT  system  code 
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has  requirements  which  differ  from  the  FORTRAN  from  the 
PLANIT  Generator  code.  The  former  has  the  requirement 
that  all  data  be  declared  in  COMMON;  the  latter  does  not 
have  that  requirement.  A  parameter  is  set  for  the  TRANSL 
program  to  indicate  which  of  the  two  cases  it  is  processing. 
If  it  is  processing  PLANIT  system  code  and  encounters  an 
item  name  which  was  not  previously  declared  in  a  COMMON 
statement,  it  will  insert  a  warning  statement  in  the 
output  file  which  says,  UNDECLARED  ITEM  NAME  ON  THE  NEXT 
LINE///////////////  (the  slashes  nark  the  line  as  before). 
This  is  simply  a  check  on  the  PLANIT  system  code  to  make 
sure  that  all  data  items  are  declared  as  they  are  supposed 
to  be.  However,  if  it  is  processing  PLANIT  Generator  code, 
Instead  of  the  warning  upon  encountering  such  an  undefined 
item  name,  TRANSL  will  simply  output  an  appropriate  DCL 
statement.  Note  that  the  FORTRAN  for  the  TRANSL  source 
code  is  like  the  PLANIT  Generator  code  and  would  be 
translated  in  the  sane  manner. 

One  additional  manipulation  must  be  done  with  a  few 
of  the  data  items.  Each  compiler  language  has  Its  own 
list  of  reserved  words.  Of  course  those  being  used  by  the 
PLANIT  programs  do  not  conflict  with  any  on  the  FORTRAN 
reserved  word  list.  However,  some  did  conflict  with  the 
TACPOL  reserved  word  list,  namely  "VALUE”  and  "L"  which 
therefore  the  TRANSL  program  converts  to  "XALUE"  and 
"H",  respectively,  wherever  they  are  encountered. 

The  remainder  of  the  work  of  the  TRANSL  program  can 
be  understood  most  easily  in  a  table  which  shows  the 
translation  rules  for  each  FORTRAN  form.  The  table  is 
shown  in  Appendix  A.  Also  included  is  a  list  of  special 
operation  characters  for  the  TRANSL  program,  all  of  which 
occur  in  column  one  of  the  input  line. 
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OPERATION  OF  TRANSL 

In  general,  TRANSL  is  a  batch  program  with  one  input 
file  and  one  output  file.  When  the  program  is  started,  it 
runs  to  completion  without  interruption. 

The  input  file  of  FORTRAN  statements  must  have  88  cards 
(lines)  inserted  prior  to  the  first  FORTRAN  statement  and 
one  card  appended  to  the  end.  The  88  prefixed  cards  con¬ 
stitute  an  initialization  deck  for  the  TRANSL  program  and 
the  information  on  all  but  the  second  card  is  fixed  and  not 
subject  to  change.  Comment  cards  may  be  added  in  addition 
to  the  88  if  desired  so  long  as  the  letter  C  occurs  in  the 
first  column.  Otherwise,  the  initialization  cards  are  of 
four  general  types,  identifiable  by  the  character  in  column 
one;  (1)  the  character  set  card  (heads  the  Initialization 
deck),  (2)  the  operation  code  card  is  second  in  order,  having 
a  digit  in  column  one,  (3)  followed  by  85  initialization 
cards  each  of  which  have  a  blank  in  columns  one  and  two 
(with  an  intermix  of  comments  permissible),  (4)  ended 
by  a  card  with  a  $  character  in  column  one. 

The  single  card  which  must  be  added  to  the  end  of  the 
FORTRAN  statements  has  a  $  character  in  column  one. 

Appendix  B  shows  the  88-card  initialization  deck. 

Since  only  the  second  card  contains  variable  data,  it  will 
be  the  only  one  that  gets  further  description.  Called  the 
operation  code,  this  second  card  designates  which  of  the 
four  tasks  described  in  the  previous  section  that  the  TRANSL 
program  is  currently  expected  to  execute.  The  parameter  is 
a  single  digit  in  column  one  having  the  value,  one  through 
four  (l.e.  1,  2,  3  or  4).  Columns  two  through  80  on  this 
card  are  disregarded  and  may  be  used  as  a  comment  field. 

The  four  tasks  which  are  designated  will  be  denoted. 

Task  1,  Task  2,  Task  3,  and  Task  4  corresponding  to  the 
parameter  settings  of  one,  two,  three  and  four,  respectively. 
Each  of  the  tasks  is  appropriate  for  a  specific  translation 
need  with  respect  to  one  or  more  of  the  programs  in  the 
PLANIT  package.  These  will  be  described  by  task  number. 

Task  1.  Task  1  translates  PLANIT  system  FORTRAN  code  into 
TACPOL  statements.  Note  that  the  usual  FORTRAN  code  as  it 
is  normally  output  from  the  PLANIT  Generator  program  does 
not  have  the  necessary  initialization  cards  for  the  TRANSL 
program  nor  the  ending  $  card.  However,  the  PLANIT  Genera¬ 
tor  program  does  have  the  facility  which  allows  these  cards 
to  be  Included  in  the  Merge  File  at  the  time  of  system 
generation.  By  including  the  necessary  cards  in  the  Merge 
File,  the  output  from  the  Generator  program  is  immediately 
ready  to  be  accepted  by  the  TRANSL  program,  making  a 
continuous  batchstream  operation. 
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A  sample  Merge  File  is  shown  in  Appendix  C.  Notice 
that  the  required  TRANSL  Initialization  cards  are  all 
present  but  are  each  shifted  to  the  right  five  columns 
to  make  room  for  the  characters,  "♦INS  "  which  serves  as 
a  directive  to  the  Generator  program  to  insert  the  cards 
appropriately.  Appendix  C  is  called  a  sample  because 
some  of  the  parameter  cards  may  change  according  to  the 
desires  of  the  installer,  however  the  information  on  the 
cards  which  correspond  to  Appendix  B,  the  initialization 
deck  for  the  TRANSL  program,  will  remain  static.  There 
will  be  no  attempt  to  explain  the  parameter  cards  in 

Appendix  C  in  this  document  since  that  is  part  of  the 

normal  PLANIT  installation  effort  which  is  documented 
elsewhere. 

The  sample  Merge  File  in  Appendix  C  also  shows  some 
special  ScEN[M>ROG  cards  which  are  Inserted  at  the  end  of 
each  PLANIT  subprogram,  to  be  used  by  the  TACPOL  compiler 
in  separating  the  overlays  into  appropriate  subprograms. 

This  will  be  understood  more  completely  in  the  TACPOL 
compiler  documentation. 

For  the  execution  of  Task  1,  it  is  sufficient  to  say 
that  given  a  proper  Merge  File  structure  prior  to  the  system 

generation  of  the  FORTRAN,  the  result  is  ready  to  input  to 

the  TRANSL  program  and,  in  turn,  its  output  is  ready  for 
the  TACPOL  compiler.  If  no  mistakes  have  been  made  in  the 
process,  100  percent  translation  can  be  expected.  However, 
it  may  be  wise  to  list  the  TACPOL  at  this  point  to  confirm 
the  successful  translation.  If  any  errors  are  flagged,  the 
bad  lines  can  usually  be  fixed  without  redoing  the  process. 
However,  if  undefined  item  names  happen  to  be  flagged,  then 
the  trouble  could  point  to  an  error  in  the  original  PLANIT 
code. 

Task  2.  Task  2  is  used  to  translate  the  PLANIT  Generator 
program  from  FORTRAN  into  TACPOL.  It  will  similarly 
translate  its  own  FORTRAN  source  code  into  TACPOL.  The 
translation  of  each  of  these  FORTRAN  programs  should  only 
be  a  onetime  affair  as  opposed  to  repeated  usage  for  Task  1. 
Therefore,  a  certain  amount  of  post-translation  hand 
repairs  is  tolerable.  The  expected  repairs  are  of  two  kinds: 
translation  failures  and  rearrangement  of  code.  These  are 
quite  well-defined,  as  follows: 

Translation  will  fail  on  four  kinds  of  FORTRAN  state¬ 
ments,  READ,  WRITE,  FORMAT  and  END  FILE.  The  number  of 
these  which  will  be  encountered  in  the  translation  will  be 
small  and  each  will  be  flagged.  The  compiler  personnel 
who  were  responsible  for  the  TACPOL  compiler  felt  that  it 
would  be  preferable  to  make  the  necessary  repairs  after 
translation  than  to  attempt  to  make  TRANSL  do  the  work. 

There  will  also  probably  be  a  need  to  add  appropriate  OPEN 
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calls  since  FORTRAN  does  this  implicitly.  The  place  where 
these  should  be  added  is  documented  in  comments  in  the 
program  listinp. 

The  second  expected  failure  is  in  the  placement  of 
subroutines  with  respect  to  the  main  program.  This  will 
be  no  problem  for  the  TRANSL  program  because  it  has  no 
subroutines.  However,  the  PLANIT  Generator  program  has 
two  and,  like  most  FORTRAN  programs,  they  follow  the  main 
program.  In  TACPOL  programs,  procedures  (l.e.  TACPOL 
equivalent  of  subroutines)  must  precede  the  main  program. 
Therefore,  the  translation  of  the  PLANIT  Generator  code 
must  be  rearranged,  placing  the  two  procedures  (subroutines) 
ahead  of  the  first  main  program  statement  and,  since  the 
first  subroutine  also  calls  the  second,  the  order  of  these 
must  also  be  reversed.  Therefore,  with  respect  to  the 
arrangement  of  the  main  program  and  the  two  subroutines  in 
FORTRAN,  the  TACPOL  version  must  be  rearranged,  placing 
the  last  procedure  (subroutine)  first,  then  working  back¬ 
ward  to  the  next  procedure,  and  finally,  the  main  program. 
Again,  making  the  TRANSL  program  do  this  automatically 
would  not  be  worthwhile,  especially  in  view  of  how  little 
it  would  get  used. 

Note  that  the  initialization  deck  for  Task  2  is 
identical  for  all  tasks  except  for  the  change  of  the  digit 
in  column  one  of  the  second  card  from  a  "1"  to  a  ”2"  (or 
"3"  or  "4"  in  the  case  of  the  other  tasks).  Also  note 
that  no  batchstream  is  Involved  as  in  Task  1  since  the 
code  being  translated  is  already  FORTRAN  and  is  not  gener¬ 
ated.  Therefore,  the  88-card  deck  as  is  shown  in  Appendix  B 
(with  the  second  card  changed)  is  to  be  appended  to  the 
FORTRAN  program  ahead  of  the  first  FORTRAN  card,  and  a 
terminal  $  card  ($  in  column  one)  is  to  be  appended  to 
the  end.  The  program  is  then  ready  to  be  input  to  the 
translator.  The  output  should  be  listed,  the  translation 
failures  (READ,  WRITE,  FORMAT  and  END  FILE)  fixed,  OPEN 
calls  added  if  necessary,  code  rearranged  if  necessary,  and 
the  DCL  statemen  i  from  Task  3  incorporated  appropriately. 

The  result  is  then  ready  for  the  TACPOL  compiler. 

Task  3.  The  purpose  of  Task  3  is  to  produce  data  df;claration 
(DCL)  statements  to  go  with  the  TACPOL  code  which  was 
produced  under  Task  2.  The  input  file  for  Task  3  is  set 
up  identical  to  that  for  Task  2  except  for  the  task  number 
change  on  the  second  card.  The  result  will  be  a  set  of 
DCL  statements  headed  by  a  TACPOL  PROC  card.  The  PROC 
card  will  be  of  the  form,  PLANIT:  PROC;  where  PLANIT  is 
the  program  name.  That  name  may  be  changed  if  desired. 

In  the  case  of  translated  code  for  the  translator  program. 
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since  It  contains  no  subroutines,  the  entire  set  of  DCL 
statements  and  the  PROC  card  should  be  added  Just  as  they 
are  to  the  front  of  the  TACPOL  code.  If  the  translation 
failures  have  already  been  fixed,  that  program  will  be 
ready  to  compile. 

The  presence  of  subroutines  in  the  PLANIT  Generator 
program  code  makes  the  proper  placement  of  the  DCL  state¬ 
ments  more  difficult.  In  general,  the  DCL  statements  which 
correspond  to  the  COMMON  items,  together  with  the  DCL  state¬ 
ments  for  those  items  which  are  unique  to  the  main  program 
should  be  placed  at  the  head  of  the  main  program.  Use 
the  PROC  card  here,  too,  as  the  first  card  of  the  main 
program.  The  subroutines  each  get  only  those  DCL  state¬ 
ments  which  are  unique  to  the  subroutines;  they  do  not 
receive  a  copy  of  the  items  which  were  made  up  from 
COMMON  statements.  Again,  the  DCL  statements  immediately 
follow  the  PROC  card.  Two  procedures  will  be  explained 
for  making  the  proper  placement  of  the  DCL  statements, 
mainly  in  order  to  convey  the  Intent.  Either  procedure 
may  be  followed. 

Procedure  one  would  be  to  execute  all  of  Task  3  on 
the  entire  input  file  as  described  above.  The  resulting 
DCL  statements  would  then  have  to  be  sorted  and  placed  as 
follows:  Mark  the  output  line&'  in  the  DCL  statements 
where  they  start  repeating  due  to  the  encounter  of  a 
new  set  of  COMMON  statements.  All  statements  from  the 
PROC  card  to  the  first  mark,  inclusive,  are  to  be  placed 
at  the  head  of  the  main  program.  Delete  the  next  set  of 
cards  after  the  first  mark  including  all  that  correspond 
to  the  COMMON  statements  which  were  translated.  Place 
only  the  remaining  DCL  statements  to  the  next  mark  after 
the  PROC  card  in  the  subroutine  (procedure)  from  which 
they  came.  The  statements  which  corresponded  to  COMMON 
are  omitted  because  TACPOL  uses  them  globally  from  the 
main  program  if  the  DCL  statement  is  not  repeated  in  the 
procedure.  Otherwise,  item  separation  will  occur.  Repeat 
the  process  for  the  remaining  set  of  DCL  statements. 

Alternately,  the  TRANSL  program  could  be  run  three 
times  in  Task  3  for  the  Generator  source  code,  first 
separating  the  FORTRAN  into  main,  and  each  of  the  two 
subroutines.  Run  TRANSL  for  the  last  subroutine  as  if 
it  were  an  entire  program.  Delete  the  DCL  statements 
that  correspond  to  the  COMMON  statements  and  place 
the  remaining  DCL  statements  ahead  of  the  corresponding 
TACPOL  procedure  (after  the  PROC  card) .  Repeat  the 
process  for  the  next  subroutine.  For  the  main  program, 
keep  all  of  the  DCL  statements  including  those  fros 
COMMON  and  head  them  with  an  appropriate  PROC  card  (which 
will  become  the  program  name)  and  place  them  at  the  head 
of  the  TACPOL  main  code  section. 
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The  source  of  the  confusion  lies  in  the  fact  that 
FORTRAN  expects  its  COMllON  data  to  be  listed  repeatedly, 
a  copy  in  the  main  program  and  each  of  the  subroutines. 
Local  data  is  often  not  declared.  TACPOL,  on  the  other 
hand,  implements  the  COMMON  data  concept  in  procedures 
(subroutines)  by  omitting  the  declaration  and  thereby 
using  the  declaration  in  the  calling  code  by  default, 
calling  it  a  globally  defined  item.  Items  which  are 
declared  in  the  procedure  are  strictly  local  items  to 
that  procedure. 

FORTRAN  programmers  will  recognize  that  in  (X)MMON 
statements,  the  exact  list  of  item  names  need  not  repeat. 
However,  one  of  the  constraints  for  the  coding  of  PLANIT- 
related  programs  Is  that  all  COMMON  lists  within  a  program 
be  Identical  and  that  no  item  is  explicitly  declared  In 
any  place  other  than  COMMON  (l.e.  there  Is  no  use  of 
DIMENSION,  EQUIVALANCE,  TYPE,  etc.).  To  deviate  from 
these  conventions  would  confuse  the  translator  program 
which  only  reinforces  the  conclusion  that  TRANSL  is  not 
a  general  purpose  FORTRAN-to-TACPOL  translator. 

Task  4.  Task  4  generates  the  DCL  statements  for  the 
PLANIT  system  TACPOL  code  generated  in  Task  1.  The  essen¬ 
tial  difference  between  Task  3  and  Task  4  is  in  the 
constraint  that  all  items  used  by  the  PLANIT  code  must 
be  explicitly  defined  (declared)  in  the  COMMON  list. 

Those  found  in  the  CX)MMON  list  will  be  translated  into 
TACPOL  DCL  statements.  Any  found  in  the  code  which  were 
not  previously  declared  in  the  COMMON  list  will  (unlike 
Task  3)  produce  an  error  in  the  output  file.  To  run 
Task  4,  the  input  file  from  Task  1  can  be  changed  such 
that  the  second  card  shows  a  "4"  instead  of  a  "1"  and 
the  TRANSL  Job  be  run  again.  This  time  the  result  should 
be  DCL  statements.  Since  each  overlay  (subprogram)  will 
have  its  own  COMMON  list,  several  DCL  lists  will  result 
only  one  of  which  will  be  useful. 

Task  4  can  be  shortened  considerably.  Since  all 
error  checking  was  already  done  in  Task  1,  the  input  file 
for  Task  4  can  be  shortened  to  any  point  beyond  the  end 
of  the  first  listing  of  (X)MMON.  Therefore,  insert  a  "$" 
card  in  column  one)  after  the  last  COMMON  statement 

of  the  first  COMMON  listing  in  the  input  file  and  TRANSL 
will  stop  when  the  $  is  encountered.  The  result  will  be 
a  single  list  of  DCL  statements,  corresponding  line-by- 
line  with  the  COMMON  statements.  This  is  all  that  is 
needed.  Note  that  this  file  into  which  the  "$"  card 
is  being  inserted  is  the  output  file  from  the  PLANIT 
Generator  program.  The  Generator  Merge  file  is  set  up 
in  such  a  way  so  that  the  output  file  is  right  for  input 
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to  the  TRANSL  program.  It  is  the  second  card  of  this  file 
that  gets  changed  from  a  "1"  to  a  "4"  and  also  a  "$"  card 
must  be  inserted  beyond  the  end  of  the  first  listing  of 
COMMON.  It  might  be  helpful  to  note  that  the  placement  of 

the  card  is  not  critical  so  long  as  it  follows  the 

COMMON  cards.  Therefore  it  could  be  arbitrarily  Inserted 
at,  say,  line  600  which  is  well  beyond  the  COMMON  cards, 
perhaps  saving  the  listing  of  the  file  to  find  the  exact 
place. 

Having  generated  a  set  of  DCL  statements  which  corres¬ 
pond  llne-for-line  with  any  of  the  several  identical  COMMON 
lists,  the  output  file  (of  DCL  cards)  will  then  be  properly 
formatted  and  ready  to  be  Inserted  into  the  procedure  which 
generates  the  COMPOOL  for  the  TACPOL  version  of  the  PLANIT 
system.  The  operation  of  the  COMPOOL  generator  is  described 
elsewhere,  being  a  part  of  the  standard  ANGYK-12  software 
facility. 
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FINAL  INSTALLATION  CONSIDERATIONS 

These  are  some  observations  that  seemed  best  to 
be  presented  near  the  end,  when  the  reader  has  more  of 
the  total  plan  in  view. 

PROC  Cards.  It  was  noted  that  while  both  Task  3  and  Task  4 
produce  DCL  statements,  only  Task  3  generates  a  PROC  card 
to  head  the  statements  (in  the  form,  PLANIT:  PRCK;).  This 
is  because  the  PROC  card  is  needed  in  that  position  to 
head  the  main  program  of  the  kind  that  is  translated  in 
Tasks  2  li  3,  namely,  the  PLANIT  Generator  and  the  Trans¬ 
lator.  However,  it  may  be  desirable  to  change  the  pro¬ 
cedure  names  to  somethina  more  appropriate  like: 

GENER:  PR(X:;  or  TRANSL:  PROC;.  The  PROC  card  is  not 
generated  in  Task  4  because  these  DCL  statements  are 
destined  for  the  COMPOOL  generator.  In  this  case,  the 
needed  PROC  card  is  supplied  through  the  Merge  File 
prior  to  generation  and  is  placed  appropriately  during 
translation  in  Task  1. 

Special  Subroutine  (Procedure)  Calls.  The  TRANSL  program 
makes  the  appropriate  translation  for  FORTRAN  subroutines 
and  the  calls  to  them  provided  that  no  argument  strings 
exist  in  the  calling  sequences.  It  is  noted  here  for 
information  that  the  call  format  produced  by  the  TRANSL 
program  will  be  considerably  different  in  Task  1  than  in 
Task  2.  In  Task  1,  what  amount  to  subroutine  calls  actually 
Invoke  a  level  change,  initiating  a  new  program.  This  is 
peculiar  to  the  special  PLANIT  operating  system  which  was 
developed  for  this  computer.  In  Task  2,  the  calling  format 
is  standard  TACPOL.  The  cause  of  special  Interest  is  the 
calling  sequence  for  the  special  procedures,  LDBYTE  and 
SBYTE.  In  the  PLANIT  system,  as  translated  by  Task  1, 
these  are  separate  programs  operating  at  their  own  level. 
However,  for  the  PLANIT  Generator  and  the  Translator 
programs,  both  of  which  use  LDBYTE  and  SBYTE  routines 
which  are  identical  to  those  for  PLANIT,  they  are  placed 
at  the  head  of  the  respective  programs  in  normal  TACPOL 
fashion  and  are  invoked  through  the  standard  calling 
format  which  is  produced  under  Task  2.  Therefore,  the 
TA(3K)L  versions  of  the  PLANIT  (Generator  and  the  Translator 
programs  should  each  begin  with  these  two  TACPOL  procedures, 
LDBYTE  and  SBYTE. 


/ 
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In  summary,  the  final  procedure  arrangement  for 
the  TACPOL  version  of  the  PLANIT  Generator  program 
should  be  (from  first  to  last): 

1 .  LDBYTE 

2  SBYTE 

3.  NUMBER  (Last  FORTRAN  subroutine) 

4.  BRCKET  (First  FORTRAN  subroutine) 

5.  Main  program 

The  Main  program  should  start  with  its  PROC  state¬ 
ment,  followed  by  the  DCL  statements  corresponding  to 
FORTRAN  CX)MMON  and  then  the  DCL  statements  for  the  items 
local  to  the  Main  program.  Each  of  the  procedures 
should  begin  with  appropriate  PROC  statements,  followed 
by  only  those  DCL  statements  that  are  for  items  local 
to  that  procedure. 

The  final  arrangement  for  the  TACPOL  version  of 
the  Translator  program  is  comparable,  as  follows: 

1 .  LDBYTE 

2 .  SBYTE 

3 .  Main  program 

The  arrangement  of  the  PROC  cards  and  DCL  statements 
is  the  same  as  above. 
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APPENDIX  A 

Table  of  rules  by  which  the  TRANSL  program  translates 
FORTRAN  particles  into  corresponding  TACPOL  particles. 
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APPENDIX  B 


Listing  of  the  initialization  cards  which  nust  be 
inserted  in  the  input  file  so  that  they  precede  the  first 
FORTRAN  statement  to  be  translated. 
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APPENDIX  C 

Sanple  listing  of  a  PLANIT  Merge  file  with  the  Translator 
Initialization  deck  embedded  in  such  a  way  that  the  resulting 
FORTRAN  will  lead  off  with  the  required  initialization  deck. 
This  constitutes  a  batchstream  for  going  from  the  original 
PLANIT  code  through  FORTRAN  to  TACPOL  with  no  intervening 
manipulation. 
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